home *** CD-ROM | disk | FTP | other *** search
/ SOHO - Exploring the Sun - 2003 Update / SOHO - Exploring the Sun - 2003 Update.iso / pc / data / main.dcr / scripts_164.ls < prev    next >
Encoding:
Text File  |  2003-02-25  |  1.3 KB  |  38 lines

  1. on prepareFrame
  2.   global hyperword, animExists
  3.   remove_nappi()
  4.   set the directToStage of member "sml_sun" to 0
  5.   set m_name to "_" & hyperword
  6.   if (hyperword = "activer") or (hyperword = "bigbang") or (hyperword = "differe") or (hyperword = "flare") or (hyperword = "fusionr") or (hyperword = "granula") or (hyperword = "lagrang") or (hyperword = "magneti") or (hyperword = "solarsy") or (hyperword = "ultravi") or (hyperword = "wavelen") then
  7.     set animExists to 1
  8.   else
  9.     set the visible of sprite 113 to 0
  10.     set animExists to 0
  11.   end if
  12.   set the locV of sprite 117 to 50
  13.   set the locH of sprite 118 to 69
  14.   if animExists = 0 then
  15.     set the visible of sprite 117 to 0
  16.     set the visible of sprite 118 to 0
  17.     set the visible of sprite 119 to 0
  18.   end if
  19.   if SpriteExists(110) > 0 then
  20.     set the directToStage of member the member of sprite 110 to 0
  21.   end if
  22.   if animExists = 1 then
  23.     set the member of sprite 113 to member m_name of castLib "Encyclopedia"
  24.     set the locH of sprite 113 to 180
  25.     set the locV of sprite 113 to 176
  26.     set the directToStage of member the member of sprite 113 to 0
  27.   end if
  28.   if SpriteExists(110) > 0 then
  29.     set the movieRate of sprite 110 to 0
  30.   end if
  31.   set the member of sprite 112 to member hyperword of castLib "Encyclopedia"
  32. end
  33.  
  34. on exitFrame
  35.   global animExists
  36.   set animExists to 200
  37. end
  38.